home *** CD-ROM | disk | FTP | other *** search
/ Digital Pose Collection / Digital Pose Collection.iso / mac / POSE / DATA / MAIN.DXR / 00021.ls < prev    next >
Encoding:
Text File  |  1996-06-18  |  472 b   |  22 lines
  1. on enterFrame
  2.   global gpage, gpagesu, gcount
  3.   repeat with n = 2 to 6
  4.     puppetSprite(n, 1)
  5.   end repeat
  6.   updateStage()
  7.   setcursor()
  8.   put gcount into field "fld.total"
  9.   put gpage && "/" && gpagesu into field "fld.page"
  10.   if gpage = 1 then
  11.     set the visible of sprite 6 to 0
  12.   else
  13.     set the visible of sprite 6 to 1
  14.   end if
  15.   if gpage >= gpagesu then
  16.     set the visible of sprite 5 to 0
  17.   else
  18.     set the visible of sprite 5 to 1
  19.   end if
  20.   updateStage()
  21. end
  22.